home *** CD-ROM | disk | FTP | other *** search
/ Photography Workshop / PhotoWorkShop.iso / pc / Content / Main / Main.cst / 00001_Main Script.ls next >
Encoding:
Text File  |  2002-04-15  |  570 b   |  26 lines
  1. property ancestor
  2. global theTour
  3. global firsttime
  4.  
  5. on Birth me, thePageChannels, theName, thePageInfo
  6.   set the ancestor of me to Birth( script "Master Page Template", thePageChannels, theName, thePageInfo, true, true )
  7.   
  8.   set FirstTimeLaunchSinceInstallation to GetPreference( #FirstTime, 0 )
  9.   if FirstTimeLaunchSinceInstallation = true then
  10.     SetPreference( #FirstTime, 0 )
  11.   end if
  12.   
  13.   if firsttime = true then
  14.     sound fadeOut 2, 120
  15.     QueueCommand( [[ #StartFirstTour ]] )
  16.   end if
  17.   
  18.   Show me
  19.   return me
  20. end
  21.  
  22.  
  23. on Leave me
  24.   Leave the ancestor of me
  25. end
  26.